home *** CD-ROM | disk | FTP | other *** search
- object SelForm: TSelForm
- Left = 276
- Top = 205
- BorderStyle = bsDialog
- Caption = 'Wybierz Katalog'
- ClientHeight = 370
- ClientWidth = 401
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 8
- Top = 312
- Width = 111
- Height = 13
- Caption = 'D:\Frydek\tp\instal'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 8
- Top = 272
- Width = 68
- Height = 13
- Caption = 'Nowy katalog:'
- end
- object ddrive: TDriveComboBox
- Left = 8
- Top = 16
- Width = 385
- Height = 19
- TabOrder = 0
- OnChange = ddriveChange
- end
- object dlist: TDirectoryListBox
- Left = 8
- Top = 56
- Width = 385
- Height = 193
- DirLabel = Label1
- ItemHeight = 16
- TabOrder = 1
- end
- object Button1: TButton
- Left = 208
- Top = 336
- Width = 83
- Height = 25
- Caption = '&OK'
- TabOrder = 2
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 312
- Top = 336
- Width = 83
- Height = 25
- Caption = '&Anuluj'
- TabOrder = 3
- OnClick = Button2Click
- end
- object nkat: TEdit
- Left = 88
- Top = 268
- Width = 145
- Height = 21
- TabOrder = 4
- OnKeyDown = nkatKeyDown
- end
- end
-